home *** CD-ROM | disk | FTP | other *** search
- on mouseDown
- global SSTnewLine, SSToldLine, STnewLine, SToldLine, STlineSave, SSTlineSave
- vActive = 1
- vNormalMember = "lists button"
- vHiliteMember = "lists button hi"
- puppetSound("high beep")
- puppetSprite(the clickOn, 1)
- set the castNum of sprite the clickOn to the number of member vHiliteMember
- updateStage()
- repeat while the stillDown
- case rollover(the clickOn) of
- 1:
- set the castNum of sprite the clickOn to the number of member vHiliteMember
- vActive = 1
- otherwise:
- set the castNum of sprite the clickOn to the number of member vNormalMember
- vActive = 0
- end case
- updateStage()
- end repeat
- case vActive of
- 1:
- set the castNum of sprite the clickOn to the number of member vNormalMember
- puppetSprite(the clickOn, 0)
- put EMPTY into field "sub-subtopics"
- SSTnewLine = 0
- SSToldLine = 0
- STnewLine = 0
- SToldLine = 0
- STlineSave = EMPTY
- SSTlineSave = EMPTY
- go("map choice")
- otherwise:
- set the castNum of sprite the clickOn to the number of member vNormalMember
- puppetSprite(the clickOn, 0)
- updateStage()
- end case
- end
-